From cf5b9a7cf09c0c59ed66a730ccf7fbd490e54908 Mon Sep 17 00:00:00 2001 From: justbur Date: Sun, 26 Jul 2015 22:04:03 -0400 Subject: [PATCH] Add a docstring --- which-key.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/which-key.el b/which-key.el index 5291b7bdd3d..262544f234f 100644 --- a/which-key.el +++ b/which-key.el @@ -870,6 +870,9 @@ element in each list element of KEYS." (lambda (x y) (max x (string-width (nth index y)))) keys :initial-value 0)) (defun which-key--pad-column (col-keys) + "Take a column of (key separator description) COL-KEYS, +calculate the max width in the column and pad all cells out to +that width." (let* ((col-key-width (which-key--max-len col-keys 0)) (col-sep-width (which-key--max-len col-keys 1)) (col-desc-width (which-key--max-len col-keys 2)) -- 2.30.2